home *** CD-ROM | disk | FTP | other *** search
/ CSi Master: Ableton Live 5 / CSi Master: Ableton Live 5.iso / pc / rsrc / locrsrc / cstshared.cst / 00003_openQuitBox (Used By MT, Cont).ls < prev    next >
Encoding:
Text File  |  2005-07-28  |  585 b   |  24 lines
  1. on openQuitBox
  2.   
  3.   -- (Used By MT, Cont)
  4.   
  5.   global gQuitWindow
  6.   
  7.   put the desktoprectlist into xxx
  8.   put getat(xxx, 1) into yyy
  9.   put getat(yyy, 3) into hhh
  10.   put getat(yyy, 4) into vvv
  11.   
  12.   set vWidth = 400
  13.   set vHeight = 200
  14.   set vPosH = integer(hhh/2) - integer(400/2)
  15.   set vPosV = integer(vvv/2) - integer(200/2)
  16.   
  17.   set gQuitWindow = window "Are You Sure?"
  18.   set the fileName of gQuitWindow = (the pathName & "quitBox")
  19.   set the windowType of gQuitWindow = 16
  20.   set the rect of gQuitWindow = rect(vPosH, vPosV, vPosH + vWidth, vPosV + vHeight)
  21.   open gQuitWindow
  22.   
  23. end
  24.